local dx,dy = canvas:attrSize()


function escribir(text,lin)
   
  canvas:attrColor(255,255,255,0)
   --canvas:clear()
   
   canvas:attrFont("vera",28)
   canvas:attrColor('green')
   canvas:drawText((2/100)*dx,lin,text)
   canvas:flush()
end

function limpiarPantalla()
	canvas:attrColor(120,240,24,0)
    canvas:drawRect('fill',(2/100)*dx,(18/100)*dy,(85/100)*dx,(74/100)*dy )
	canvas:flush()
	
end


function handler (evt)
		
	if evt.class ~= 'ncl' or evt.type ~= 'presentation' or evt.action ~= 'start' then 
 	      return 
    end
		
		limpiarPantalla()
    	escribir("Desea Ver los resultados?",(20/100)*dy)
    	
end

event.register(handler)